home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
dub Media Cool Graphics
/
Dub Media - Cool Graphics.iso
/
SBdemo
/
WLD
/
SALDEMO.WLD
< prev
next >
Wrap
Text File
|
1997-01-28
|
15KB
|
427 lines
START_WLD = THUDCHAT_WLD
DISKID=1
DISKAUDIO=$SBARDIR\GENERAL\CHADIS1.WAV
// ID X Y FileName
CURSOR 0 = 15 15 $SBARDIR\NEBLITZ\CURSORS\SALIV\NOT.BMP
CURSOR 1 = 16 1 $SBARDIR\NEBLITZ\CURSORS\SALIV\SALIV.BMP
CURSOR 2 = 9 9 $SBARDIR\NEBLITZ\CURSORS\SALIV\ZOOM.BMP
CURSOR 5 = 16 1 $SBARDIR\NEBLITZ\CURSORS\SALIV\LINK.BMP
CURSOR 6 = 15 15 $SBARDIR\NEBLITZ\CURSORS\SALIV\WAIT.BMP
CURSOR 10 = 0 0 $SBARDIR\NEBLITZ\CURSORS\SALIV\EXIT.BMP
CURSOR 14 = 0 14 $SBARDIR\NEBLITZ\CURSORS\SALIV\LEFT.BMP
CURSOR 15 = 15 0 $SBARDIR\NEBLITZ\CURSORS\SALIV\UPARROW.BMP
CURSOR 16 = 31 15 $SBARDIR\NEBLITZ\CURSORS\SALIV\RIGHT.BMP
CURSOR 17 = 15 31 $SBARDIR\NEBLITZ\CURSORS\SALIV\DOWN.BMP
CURSOR 19 = 15 15 $SBARDIR\NEBLITZ\CURSORS\SALIV\BNOT.BMP
CURSOR 20 = 15 15 $SBARDIR\NEBLITZ\CURSORS\SALIV\BEXIT.BMP
CURSOR 22 = 16 1 $SBARDIR\NEBLITZ\CURSORS\SALIV\HUMAN.BMP
CURSOR 24 = 27 1 $SBARDIR\BAR\CURSORS\LINK.BMP
// Wield Cursors
CURSOR 31 = 0 0 $SBARDIR\NEBLITZ\WIELD\nhta.bmp
CURSOR 32 = 0 0 $SBARDIR\NEBLITZ\WIELD\nhtb.bmp
CURSOR 33 = 0 0 $SBARDIR\NEBLITZ\WIELD\nhtc.bmp
CURSOR 34 = 0 0 $SBARDIR\NEBLITZ\WIELD\nhtd.bmp
VAR BAZFIRE = FALSE
VAR INIT=TRUE
VAR CUPLOOK = FALSE
VAR STURNCOUNT AS TIMER = 200
// jwl 11.18.96 PDA save state information
VAR PDAMODE = NOMODE
VAR PDAINCREMENT = 11
VAR RADIOON = FALSE
VAR PDAPOSITION = DOWN
SDEV BPDA_WLD AS PDA{
SET BKG = $SBARDIR\NEBLITZ\PDA\SALIV\OPDA.BMP;
SET ARE=DEACTIVE[0,0,514,238]{
RUN COMMAND = DEACTIVATEPDA;
};
SET BUT = $SBARDIR\NEBLITZ\PDA\SALIV\OMAP.BMP[116,187]+1^100;
SET BUT = $SBARDIR\NEBLITZ\PDA\SALIV\OSTASH.BMP[161,186]+1^101;
SET BUT = $SBARDIR\NEBLITZ\PDA\SALIV\OZOOM.BMP[208,186] +1^102{
// DEMO: zoom brings up not included message -- bar 01-23-97
SET TXT = $SBARDIR\GENERAL\NOTINCL.TXT COLOR 2 AS CAPTION;
};
SET BUT=$SBARDIR\NEBLITZ\PDA\SALIV\OSYSTEM.BMP[254,188]+1^103;
SET BUT = $SBARDIR\NEBLITZ\PDA\SALIV\OLOG.BMP[299,188]+1^104;
SET CHR=$SBARDIR\NEBLITZ\PDA\SALIV\OWAND.SMK^WANDANIM LOOP 0 [44,31];
SET TIME=$SBARDIR\NEBLITZ\PDA\SALIV\OTIME.BMP[410,140]^CLOCK+11 VALUE STURNCOUNT;
SET BMP = $SBARDIR\NEBLITZ\MAP\NHP.BMP[374,81];
}
SDEV MAP_WLD AS BMP RECT [114, 61, 346, 171]{
SET BKG = $SBARDIR\NEBLITZ\MAP\OMAP.BMP;
}
SDEV INV_WLD AS INVWLD RECT [114, 61, 346, 171]{
SET BKG = $SBARDIR\NEBLITZ\INV\INVBACK.BMP;
HOLD BMP = $SBARDIR\NEBLITZ\INV\NHTB.BMP^TOKEN{
SET TXT = little_metal_thing COLOR 2 SIZE 16 AS TITLE; //%%283
SET BMP = $SBARDIR\GENERAL\MENUS\EXAMINE.BMP{
RUN SND = $SBARDIR\NEBLITZ\AUDIO\NHTBEXC1.wav AS QUEUE;
RUN MOVIE = $SBARDIR\NEBLITZ\OBJ\NHTB.SMK AS EXAMINE;
};
SET BMP = $SBARDIR\GENERAL\MENUS\EAT.BMP{
RUN SND = $SBARDIR\NEBLITZ\AUDIO\NHTAEAC1.wav AS QUEUE;
};
SET BMP = $SBARDIR\GENERAL\MENUS\PICKUP.BMP{
RUN COMMAND = TRANSFER OBJECT TOKEN FROM INV_WLD TO BWIELD_WLD;
};
};
HOLD BMP = $SBARDIR\NEBLITZ\INV\NHTA.BMP^CUP{
SET TXT = cup COLOR 2 SIZE 16 AS TITLE; //%%296
SET BMP = $SBARDIR\GENERAL\MENUS\EXAMINE.BMP{
RUN SND = $SBARDIR\NEBLITZ\AUDIO\NHTAEXC1.wav AS QUEUE;
RUN MOVIE = $SBARDIR\NEBLITZ\OBJ\NHTA.SMK AS EXAMINE;
};
IF ( CUPLOOK == FALSE )
SET BMP = $SBARDIR\GENERAL\MENUS\LOOKIN.BMP{
RUN LNK = NHP_WLD~~EXINCUP_WLD~~INCUP_WLD;
};
ENDIF
SET BMP = $SBARDIR\GENERAL\MENUS\EAT.BMP{
RUN SND = $SBARDIR\NEBLITZ\AUDIO\NHTAEAC1.wav AS QUEUE;
};
SET BMP = $SBARDIR\GENERAL\MENUS\PICKUP.BMP{
RUN COMMAND = TRANSFER OBJECT CUP FROM INV_WLD TO BWIELD_WLD;
};
};
HOLD BMP = $SBARDIR\NEBLITZ\INV\NHTC.BMP^MACHINE{
SET TXT = blinking_machine COLOR 2 SIZE 16 AS TITLE; //%%319
SET BMP = $SBARDIR\GENERAL\MENUS\EXAMINE.BMP{
RUN SND = $SBARDIR\NEBLITZ\AUDIO\NHTCEXC1.wav AS QUEUE;
RUN MOVIE = $SBARDIR\NEBLITZ\OBJ\NHTC.SMK AS EXAMINE;
};
SET BMP = $SBARDIR\GENERAL\MENUS\EAT.BMP{
RUN SND = $SBARDIR\NEBLITZ\AUDIO\NHTCEAC1.wav AS QUEUE;
};
IF ( RADIOON == FALSE )
SET BMP = $SBARDIR\GENERAL\MENUS\ON.BMP{
RUN EXPR = RADIOON ( TRUE );
};
ENDIF
IF ( RADIOON == TRUE )
SET BMP = $SBARDIR\GENERAL\MENUS\OFF.BMP{
RUN EXPR = RADIOON ( FALSE );
};
ENDIF
SET BMP = $SBARDIR\GENERAL\MENUS\PICKUP.BMP{
RUN COMMAND = TRANSFER OBJECT MACHINE FROM INV_WLD TO BWIELD_WLD;
};
};
HOLD BMP = $SBARDIR\NEBLITZ\INV\NHTD.BMP^BAZOOKA{
SET TXT = bazooka COLOR 2 SIZE 16 AS TITLE; //%%347
SET BMP = $SBARDIR\GENERAL\MENUS\EXAMINE.BMP{
RUN SND = $SBARDIR\NEBLITZ\AUDIO\NHTDEXC1.wav AS QUEUE;
RUN MOVIE = $SBARDIR\NEBLITZ\OBJ\NHTD.SMK AS EXAMINE;
};
SET BMP = $SBARDIR\GENERAL\MENUS\EAT.BMP{
RUN SND = $SBARDIR\NEBLITZ\AUDIO\NHTAEAC1.wav AS QUEUE;
};
SET BMP = $SBARDIR\GENERAL\MENUS\PICKUP.BMP {
RUN COMMAND = TRANSFER OBJECT BAZOOKA FROM INV_WLD TO BWIELD_WLD;
};
};
}
SDEV LOG_WLD AS LOG RECT[115,61,350,171]{
SET BKG = $SBARDIR\NEBLITZ\LOG\SALLOG.BMP;
}
SDEV BWIELD_WLD AS WIELD{
BKG=$SBARDIR\NEBLITZ\WIELD\SALME.BMP;
SET ARE = YOU[0,0,100,100]{
SET TXT = Thud COLOR 2 SIZE 16 AS TITLE; //%%173
SET BMP=$SBARDIR\GENERAL\MENUS\WAIT.BMP{
RUN SND = $SBARDIR\GENERAL\WAIT.WAV;
RUN COMMAND = UPDATE;
};
SET BMP = $SBARDIR\GENERAL\MENUS\SNAPOUT.BMP{
RUN LNK = $SBARDIR\WLD\BAR.WLD~~BDP_WLD~~FLEETHUD_WLD FADE 3;
};
};
HOLD BMP = $SBARDIR\NEBLITZ\WIELD\NHTB.BMP^TOKEN#32{
SET TXT = little_metal_thing COLOR 2 SIZE 16 AS TITLE; //%%185
SET BMP = $SBARDIR\GENERAL\MENUS\EXAMINE.BMP{
RUN SND = $SBARDIR\NEBLITZ\AUDIO\NHTBEXC1.wav AS QUEUE;
RUN MOVIE = $SBARDIR\NEBLITZ\OBJ\NHTB.SMK AS EXAMINE;
};
SET BMP = $SBARDIR\GENERAL\MENUS\EAT.BMP{
RUN SND = $SBARDIR\NEBLITZ\AUDIO\NHTAEAC1.wav AS QUEUE;
};
SET BMP = $SBARDIR\GENERAL\MENUS\STASH.BMP{
RUN COMMAND = TRANSFER OBJECT TOKEN FROM BWIELD_WLD TO INV_WLD;
};
};
HOLD BMP = $SBARDIR\NEBLITZ\WIELD\NHTA.BMP^CUP #31{
SET TXT = cup COLOR 2 SIZE 16 AS TITLE; //%%198
SET BMP = $SBARDIR\GENERAL\MENUS\EXAMINE.BMP {
RUN SND = $SBARDIR\NEBLITZ\AUDIO\NHTAEXC1.wav AS QUEUE;
RUN MOVIE = $SBARDIR\NEBLITZ\OBJ\NHTA.SMK AS EXAMINE;
};
IF ( CUPLOOK == FALSE )
SET BMP = $SBARDIR\GENERAL\MENUS\LOOKIN.BMP{
RUN LNK = NHP_WLD~~EXINCUP_WLD~~INCUP_WLD;
};
ENDIF
SET BMP = $SBARDIR\GENERAL\MENUS\EAT.BMP{
RUN SND = $SBARDIR\NEBLITZ\AUDIO\NHTAEAC1.wav AS QUEUE;
};
SET BMP = $SBARDIR\GENERAL\MENUS\THROW.BMP{
RUN SND = $SBARDIR\NEBLITZ\AUDIO\NHTATWC1.wav AS QUEUE;
};
SET BMP = $SBARDIR\GENERAL\MENUS\STASH.BMP{
RUN COMMAND = TRANSFER OBJECT CUP FROM BWIELD_WLD TO INV_WLD;
};
};
HOLD BMP = $SBARDIR\NEBLITZ\WIELD\NHTD.BMP^BAZOOKA #34 {
SET TXT = bazooka COLOR 2 SIZE 16 AS TITLE; //%%253
SET BMP = $SBARDIR\GENERAL\MENUS\EXAMINE.BMP{
RUN SND = $SBARDIR\NEBLITZ\AUDIO\NHTDEXC1.wav AS QUEUE;
RUN MOVIE = $SBARDIR\NEBLITZ\OBJ\NHTD.SMK AS EXAMINE;
};
SET BMP = $SBARDIR\GENERAL\MENUS\EAT.BMP {
RUN SND = $SBARDIR\NEBLITZ\AUDIO\NHTAEAC1.wav AS QUEUE;
};
SET BMP = $SBARDIR\GENERAL\MENUS\STASH.BMP{
RUN COMMAND = TRANSFER OBJECT BAZOOKA FROM BWIELD_WLD TO INV_WLD;
};
};
// DEMO: Removed interactions with blinking_machine.
}
// Thud Chat
SDEV THUDCHAT_WLD AS CHAT{
SET BKG = $SBARDIR\NEBLITZ\CHAR\THUD\CHBLACK.BMP;
// DEMO: Pull Thud's neutral loop from the bar asset area.
SET CHR = $SBARDIR\BAR\CHAR\THUD\TBNEUTR1.SMK^THUDMOVIE [80,10];
SET ARE = [0,0,639,479]%19;
SET AREA=[0,0,80,370]%20{
RUN EXPR = FINISHCHOICE( RANDOM % 5 );
IF (FINISHCHOICE == 0)
RUN SND = $SBARDIR\BAR\CHAR\FINISH\FINISH1.WAV AS WAITMIX;
ENDIF
IF (FINISHCHOICE == 1)
RUN SND = $SBARDIR\BAR\CHAR\FINISH\FINISH2.WAV AS WAITMIX;
ENDIF
IF (FINISHCHOICE == 2)
RUN SND = $SBARDIR\BAR\CHAR\FINISH\FINISH3.WAV AS WAITMIX;
ENDIF
IF (FINISHCHOICE == 3)
RUN SND = $SBARDIR\BAR\CHAR\FINISH\FINISH4.WAV AS WAITMIX;
ENDIF
IF (FINISHCHOICE == 4)
RUN SND = $SBARDIR\BAR\CHAR\FINISH\FINISH5.WAV AS WAITMIX;
ENDIF
RUN EXPR = LEVEL( 0 );
RUN LNK = $SBARDIR\WLD\BAR.WLD~~BDP_WLD~~FLEETHUD_WLD FADE 3;
};
IF (OPENERDONE